-- background: 2659 from stack: in
-- bmap block id: 3934
-- flags: 0000
-- background id: 0
-- name: 
----- HyperTalk script -----
on StartEditing
  global theButton
  set cursor to watch
  set the lockText of bg fld 1 to false
  Show cd btn "Hide Buttons"
  set the highlight of cd btn theButton to true
  -- put empty into bg fld 1
  put the script of cd btn theButton into temp
  put line 16 to (the number of lines in temp) of temp into bg fld 1
  show bg btn "Click HERE   to End Editing"
  exit to HyperCard
end StartEditing

on other
  global theButton
  put empty into bg fld 1
  hide cd btn "Hide Buttons"
  set the style of bg fld 1 to transparent
  set the highlight of cd btn theButton to false
  set the lockText of bg fld 1 to true
  hide bg btn "Click HERE   to End Editing"
  exit to HyperCard
end other


-- part 1 (field)
-- low flags: 07
-- high flags: 0000
-- rect: left=25 top=23 right=155 bottom=485
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----

on mouseWithin
  if the visible of bg btn "Click HERE   to End Editing" = false then
    put return&return&"                   This field displays information about Buttons"&return&return& "                       when the hand cursor is over a Button." into bg fld 1
  end if
end mouseWithin

on mouseLeave
  if the visible of bg btn "Click HERE   to End Editing" = false then
    put empty into bg fld 1
  end if
end mouseLeave



-- part 2 (button)
-- low flags: 80
-- high flags: C003
-- rect: left=35 top=160 right=177 bottom=426
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Click HERE   to End Editing
----- HyperTalk script -----
on mouseUp
  global theButton
  -- debug checkpoint
  -- VW
  if bg fld 1 is empty then other
  put the script of cd btn theButton into temp
  repeat with counter = 16 to (the number of lines in temp)
    delete last line of temp
  end repeat
  put return&bg fld 1 after line 15 of temp
  put empty into bg fld 1
  set the script of cd btn theButton to temp
  hide cd btn "Hide Buttons"
  set the lockText of bg fld 1 to true
  set the style of bg fld 1 to transparent
  set the highlight of cd btn theButton to false
  hide me
end mouseUp